home *** CD-ROM | disk | FTP | other *** search
- inherited frmWindowTmplt: TfrmWindowTmplt
- Left = 479
- Top = 249
- OldCreateOrder = True
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- inherited pnlCenter: TPanel
- inherited pgcControlPage: TPageControl
- inherited tbsAM5Main: TTabSheet
- object Label2: TLabel
- Left = 10
- Top = 16
- Width = 417
- Height = 13
- AutoSize = False
- Caption = '&Window title:'
- FocusControl = cboWindowTitle
- end
- object cboWindowTitle: TComboBox
- Left = 10
- Top = 32
- Width = 433
- Height = 21
- ItemHeight = 13
- Sorted = True
- TabOrder = 0
- end
- object cbIncludeHiddenWindows: TCheckBox
- Left = 10
- Top = 65
- Width = 425
- Height = 17
- Caption = 'Include &hidden windows'
- TabOrder = 1
- OnClick = cbIncludeHiddenWindowsClick
- end
- object WindowHandlePnl1: TWindowHandlePnl
- Left = 0
- Top = 90
- Width = 457
- Height = 85
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelOuter = bvNone
- Caption = ' '
- TabOrder = 2
- end
- end
- object tbsContents: TTabSheet [1]
- Caption = 'Contents'
- ImageIndex = 3
- OnShow = tbsContentsShow
- object lblWindow: TLabel
- Left = 8
- Top = 27
- Width = 3
- Height = 13
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 274
- Height = 13
- AutoSize = False
- Caption = 'Current window:'
- end
- object WindowObjectList1: TWindowObjectList
- Left = -3
- Top = 48
- Width = 465
- Height = 169
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelOuter = bvNone
- TabOrder = 0
- WindowTitle = '*'
- HiddenWindow = True
- end
- end
- end
- end
- inherited dxSIBarManager: TdxBarManager
- Categories.ItemsVisibles = (
- 2)
- Categories.Visibles = (
- True)
- PopupMenuLinks = <
- item
- Control = lsvAM5Errors
- PopupMenu = dxCheckPopup
- end>
- DockControlHeights = (
- 0
- 0
- 0
- 0)
- end
- inherited dxCheckPopup: TdxBarPopupMenu
- ItemLinks = <
- item
- Item = itmCheckAllErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end
- item
- Item = itmCheckNoErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end>
- end
- end
-